home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / Borland Plateform / Turbo Prolog 2 / EXAMPL30.PRO < prev    next >
Encoding:
Text File  |  1986-04-01  |  244 b   |  8 lines
  1.                /* Program 30 */
  2. goal
  3.      makewindow(1,7,7,"Directory for disk A",0,0,20,35),
  4.      system("dir a:"),
  5.      makewindow(2,7,7,"Directory for disk B",0,40,20,35),
  6.      system("dir b:"),
  7.      makewindow(3,7,7,"",21,25,3,30).
  8.